///*Data coding was already completed in the replication dataset - it is included for reference so the original variables and recoded variables can be compared
///*Text marked /// is code that can be run if needed - ///* is comments

///*Study 1
///*use jeps study 1 replication data.dta

///*Data coding

///*Condition
///gen condition=0
///replace condition=1 if fl_6_do_covidhealth==1
///replace condition=2 if fl_6_do_covidecon==1
///replace condition=3 if fl_6_do_covidhealthecon==1
///label define con 0 "control" 1 "health" 2 "econ" 3 "health/econ"
///label val condition con
///tab condition

///gen health_r=0
///replace health_r=1 if condition==1
///tab health_r
///label var health_r "Health"

///gen econ_r=0
///replace econ_r=1 if condition==2
///tab econ_r
///label var econ_r "Econ."

///gen healthecon_r=0
///replace healthecon_r=1 if condition==3
///tab healthecon_r
///label var healthecon_r "Combined"

///*COVID attitudes
///tab q92
///gen wash=(6-q92)/5
///label var wash "will wash hands more"
///label define likely 0 "unlikely" 1 "likely"
///label val wash likely
///tab q92 wash

///tab q102
///gen socdist=(6-q102)/5
///label var socdist "will socially distance"
///label val socdist likely
///tab q102 socdist

///tab var65
///gen trips=(6-var65)/5
///label var trips "will reduce trips outside home"
///label val trips likely
///tab var65 trips

///tab q104
///gen mask=(6-q104)/5
///label var mask "will wear mask"
///label val mask likely
///tab q104 mask

///*this excludes people who already got the vaccine
///tab var67
///gen vaccineprosp=var67
///recode vaccineprosp 7=.
///replace vaccineprosp=(6-vaccineprosp)/5
///label var vaccineprosp "will get vaccine"
///label val vaccineprosp likely
///tab var67 vaccineprosp

///tab q108
///gen buyonline=(6-q108)/5
///label var buyonline "will buy online"
///label val buyonline likely
///tab q108 buyonline

///*Individual behavior
alpha wash socdist trips mask vaccineprosp buyonline, item 
///egen behavmiss=rowmiss(wash socdist trips mask vaccineprosp buyonline)
///egen behavindex=rowmean(wash socdist trips mask vaccineprosp buyonline) if behavmiss<4
///label value behavindex likely
///replace behavindex=round(behavindex, .01)
///fre behavmiss
///fre behavindex

///*policy attitudes
///tab q102_1
///gen pol_mask=(6-q102_1)/5
///label define pol 0 "disapprove" 1 "approve"
///label var pol_mask "mask mandate"
///label val pol_mask pol
///tab q102_1 pol_mask

///tab q102_2
///gen pol_worship=(6-q102_2)/5
///label var pol_worship "worship limits"
///label val pol_worship pol
///tab q102_2 pol_worship

///tab q102_3
///gen pol_dining=(6-q102_3)/5
///label var pol_dining "dining limits"
///label val pol_dining pol
///tab q102_3 pol_dining

///tab q102_4
///gen pol_lockdown=(6-q102_4)/5
///label var pol_lockdown "lockdown"
///label val pol_lockdown pol
///tab q102_4 pol_lockdown

///tab q102_5
///gen pol_school=(6-q102_5)/5
///label var pol_school "school closure"
///label val pol_school pol
///tab q102_5 pol_school

///*Policy index
alpha pol_mask pol_worship pol_dining pol_lockdown pol_school, item
///egen polmiss=rowmiss(pol_mask pol_worship pol_dining pol_lockdown pol_school)
///egen polindex=rowmean(pol_mask pol_worship pol_dining pol_lockdown pol_school) if polmiss<3
///label value polindex pol
///replace polindex=round(polindex, .01)
///fre polmiss
///fre polindex

///*ideology
///tab q31
///gen ideo=(q31-1)/6
///label define ideo 0 "lib" 1 "con"
///label val ideo ideo
///tab q31 ideo

///*3-point variable - 
///gen ideo3=ideo
///replace ideo3=0 if ideo<.5
///replace ideo3=1 if ideo>.5
///label values ideo ideo
///tab ideo3

///*COVID demos
///gen selfpos=2-q84
///label define yn 0 "no" 1 "yes"
///label val selfpos yn
///label var selfpos "R tested COVID positive"
///tab q84 selfpos

///gen fampos=2-q86
///label val fampos yn
///label var fampos "family/friends tested COVID positive"
///tab q86 fampos

///*age (coded in years)
///gen ageq=q70
///summ ageq q70

///*gender (male/other = 0, female = 1)
///tab q72
///gen female=q72-1
///recode female 2=0
///tab q72 female

///*text responses for 'other' are in q72_3_text

///*race/ethnicity
///*separate variables for each identity 
///*(note that many people will be a 'yes' on more than one of these variables)
///tab q74_1
///gen latino=.
///forval i=1(1)5 {
///	qui replace latino = 0 if q74_`i'==1 
///	}
///replace latino=1 if q74_1==1
///tab q74_1 latino

///tab q74_2
///gen black=.
///forval i=1(1)5 {
///	qui replace black = 0 if q74_`i'==1 
///	}
///replace black=1 if q74_2==1
///tab q74_2 black

///tab q74_3
///gen asian=.
///forval i=1(1)5 {
///	qui replace asian = 0 if q74_`i'==1 
///	}
///replace asian=1 if q74_3==1
///tab q74_3 asian

///tab q74_4
///gen white=.
///forval i=1(1)5 {
///	qui replace white = 0 if q74_`i'==1 
///	}
///replace white=1 if q74_4==1
///tab q74_4 white

///tab q74_5
///gen native=.
///forval i=1(1)5 {
///	qui replace native = 0 if q74_`i'==1 
///	}
///replace native=1 if q74_5==1
///tab q74_5 native

///*variable for non-hispanic white
///gen onlywhite=white
///replace onlywhite=0 if latino==1 | black==1 | asian==1 | native==1
///tab onlywhite white
///tab onlywhite latino
///tab onlywhite black
///tab onlywhite asian
///tab onlywhite native

///*education
///*use 'edu' to look at the distribution of responses. use 'edu01' in regressions.
///tab q76
///gen edu=q76-1
///label define edu 0 "less than high school" 1 "high school/GED" 2 "some college" 3 "2-year college" 4 "4-year college" 5 "master's" 6 "doctor"
///label values edu edu
///tab q76 edu

///gen edu01=(edu)/6
///tab edu01 edu

///*household income
///tab q78
///gen income=(q78-1)/10
///label define income 0 "<10k" 1 "100k+"
///label values income income
///tab q78 income

///*state of residence
///tab q80
///gen state=q80
///label define state 1 "AL" 2 "AK" 3 "AZ" 4 "AR" 5 "CA" 6 "CO" 7 "CT" 8 "DE" 9 "DC" 10 "FL" 11 "GA" 12 "HI" 13 "ID" 14 "IL" 15 "IN" 16 "IA" 17 "KS" 18 "KY" 19 "LA" 20 "ME" 21 "MD" 22 "MA" 23 "MI" 24 "MN" 25 "MS" 26 "MO" 27 "MT" 28 "NE" 29 "NV" 30 "NH" 31 "NJ" 32 "NM" 33 "NY" 34 "NC" 35 "ND" 36 "OH" 37 "OK" 38 "OR" 39 "PA" 40 "PR" 41 "RI" 42 "SC" 43 "SD" 44 "TN" 45 "TX" 46 "UT" 47 "VT" 48 "VA" 49 "WA" 50 "WV" 51 "WI" 52 "WY" 53 "No state"
///label val state state
///tab state

///*census regions
///gen west=0 if state!=.
///replace west=1 if state==49 | state==38 | state==5 | state==27 | state==13 | state==52 | state==46 | state==29 | state==6 | state==3 | state==32 | state==12 | state==2
///tab west

///gen midwest=0 if state!=.
///replace midwest=1 if state==35 | state==43 | state==28 | state==17 | state==24 | state==16 | state==26 | state==51 | state==14 | state==23 | state==15 |state==36
///tab midwest

///gen south=0 if state!=.
///replace south=1 if state==37 | state==45 | state==4 | state==19 | state==18 | state==44 | state==25 | state==1 | state==8 | state==21 | state==50 | state==9 | state==48 | state==34 | state==42 | state==11 | state==10
///tab south

///gen northeast=0 if state!=.
///replace northeast=1 if state==20 | state==30 | state==47 | state==22 | state==7 | state==41 | state==33 | state==31 | state==39
///tab northeast

///*urban/rural
///tab q82_1
///gen rural=(q82_1)/4
///label define rural 0 "urban" 1 "rural"
///label val rural rural
///tab rural
///tab rural q82_1

///*Analyses

///*Table 1 - Study 1
reg behavindex  i.condition ideo selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model1
reg behavindex  i.condition##c.ideo selfpos fampos age female onlywhite edu01 income rural west south midwest
est store model2
reg polindex  i.condition ideo selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model3
reg polindex  i.condition##c.ideo selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model4

esttab model1 model2 model3 model4, label b(2) se r2 star(+ 0.10 * 0.05 ** 0.01)  ///
  title(Table 1: Study 1)
  
///*Table A1 - Study 1 Participant Demographics
summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) 
tab edu
tab income

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==0 
tab edu if condition==0
tab income if condition==0

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==1 
tab edu if condition==1
tab income if condition==1

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==2
tab edu if condition==2
tab income if condition==2

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==3
tab edu if condition==3
tab income if condition==3

///*Table A2 - Study 1 Distribution of Liberals, Moderates, and Conservatives
tab ideo3 condition

///*Table A3 - Study 1 Interaction with Three-Point Ideology
reg behavindex  i.condition ideo3 selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model1
reg behavindex  i.condition##c.ideo3 selfpos fampos age female onlywhite edu01 income rural west south midwest
est store model2
reg polindex  i.condition ideo3 selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model3
reg polindex  i.condition##c.ideo3 selfpos fampos age female onlywhite edu01 income rural west south midwest 
est store model4

esttab model1 model2 model3 model4, label b(2) se r2 star(+ 0.10 * 0.05 ** 0.01)  ///
  title(Table A3: Study 1)

///*Study 2
///*use jeps study 2 replication data.dta

///*Data coding

///*framing condition
///gen condition=.
///replace condition=0 if bas_duration_controlmanip!=.
///replace condition=1 if bas_duration_healthmanip!=.
///replace condition=2 if bas_duration_econmanip!=.
///replace condition=3 if bas_duration_healtheconmanip!=.
///label define con 0 "control" 1 "health" 2 "econ" 3 "health/econ"
///label val condition con
///tab condition

///gen health=0
///replace health=1 if condition==1
///tab health

///gen econ=0
///replace econ=1 if condition==2
///tab econ

///gen combined=0
///replace combined=1 if condition==3
///tab combined

///*attention check
///tab bas_attncheck
///tab bas_attncheck condition
///gen attcorrect=0
///replace attcorrect=1 if condition==0 & bas_attncheck==2
///replace attcorrect=1 if condition>=1 & bas_attncheck==1
///tab attcorrect

///*individual behavior attitudes
///tab bas_healthbehav1
///gen wash=(6-bas_healthbehav1)/5
///label var wash "will wash hands more"
///label define likely 0 "unlikely" 1 "likely"
///label val wash likely
///tab bas_healthbehav1 wash

///tab bas_healthbehav2
///gen socdist=(6-bas_healthbehav2)/5
///label var socdist "will socially distance"
///label val socdist likely
///tab bas_healthbehav2 socdist

///tab bas_healthbehav3
///gen trips=(6-bas_healthbehav3)/5
///label var trips "will reduce trips outside home"
///label val trips likely
///tab bas_healthbehav3 trips

///tab bas_healthbehav4
///gen mask=(6-bas_healthbehav4)/5
///label var mask "will wear mask"
///label val mask likely
///tab bas_healthbehav4 mask

///tab bas_healthbehav5
///gen vaccine=(6-bas_healthbehav5)/5
///label var vaccine "will get vaccine"
///label val vaccine likely
///tab bas_healthbehav5 vaccine

///tab bas_healthbehav6
///gen buyonline=(6-bas_healthbehav6)/5
///label var buyonline "will buy online"
///label val buyonline likely
///tab bas_healthbehav6 buyonline

///tab bas_healthbehav9
///gen maskindoors=(6-bas_healthbehav9)/5
///label var maskindoors "will wear mask indoors"
///label val maskindoors likely
///tab bas_healthbehav9 maskindoors

///tab bas_healthbehav7
///gen crowded=(6-bas_healthbehav7)/5
///label var crowded "will avoid crowds"
///label val crowded likely
///tab bas_healthbehav7 crowded

///tab bas_healthbehav8
///gen avoidnovax=(6-bas_healthbehav8)/5
///label var avoidnovax "will avoid unvaccinated"
///label val avoidnovax likely
///tab bas_healthbehav8 avoidnovax

///*policy attitudes
///tab bas_healthpol1
///gen pol_mask=(6-bas_healthpol1)/5
///label define pol 0 "disapprove" 1 "approve"
///label var pol_mask "mask mandate"
///label val pol_mask pol
///tab bas_healthpol1 pol_mask

///tab bas_healthpol2
///gen pol_worship=(6-bas_healthpol2)/5
///label var pol_worship "worship limits"
///label val pol_worship pol
///tab bas_healthpol2 pol_worship

///tab bas_healthpol3
///gen pol_dining=(6-bas_healthpol3)/5
///label var pol_dining "dining limits"
///label val pol_dining pol
///tab bas_healthpol3 pol_dining

///tab bas_healthpol4
///gen pol_lockdown=(6-bas_healthpol4)/5
///label var pol_lockdown "lockdown"
///label val pol_lockdown pol
///tab bas_healthpol4 pol_lockdown

///tab bas_healthpol5
///gen pol_school=(6-bas_healthpol5)/5
///label var pol_school "school closure"
///label val pol_school pol
///tab bas_healthpol5 pol_school

///tab bas_healthpol6
///gen pol_state=(6-bas_healthpol6)/5
///label var pol_state "limit interstate travel"
///label val pol_state pol
///tab bas_healthpol6 pol_state

///tab bas_healthpol7
///gen pol_national=(6-bas_healthpol7)/5
///label var pol_national "limit international travel"
///label val pol_national pol
///tab bas_healthpol7 pol_national

///tab bas_healthpol8
///gen pol_pass=(6-bas_healthpol8)/5
///label var pol_pass "vaccine passports"
///label val pol_pass pol
///tab bas_healthpol8 pol_pass

///tab bas_healthpol9
///gen pol_mustvax=(6-bas_healthpol9)/5
///label var pol_mustvax "vaccine mandate"
///label val pol_mustvax pol
///tab bas_healthpol9 pol_mustvax

///*ideology
///tab ideo
///replace ideo=(ideo-1)/6
///label define ideo 0 "lib" 1 "con"
///label val ideo ideo
///tab ideo

///gen ideo3=ideo
///replace ideo3=0 if ideo<.5
///replace ideo3=1 if ideo>.5
///label values ideo ideo
///tab ideo3

///*Party ID
///tab pid_lucid
///gen pid=(pid_lucid-1)/6
///label define pid 0 "strong dem" 1 "strong rep"
///label values pid pid
///tab pid pid_lucid

///*age (coded in years)
///summ age

///*gender (male/other = 0, female = 1)
///tab female

///*race/ethnicity
///tab race_lucid
///tab hispanic_lucid
///tab race_lucid hispanic_lucid

///*variable for non-hispanic white
///gen onlywhite=0 if race_lucid!=.
///replace onlywhite=1 if race_lucid==1 & hispanic_lucid==0
///tab onlywhite race_lucid
///tab onlywhite hispanic_lucid

///*education
///*use 'educ_lucid' to look at the distribution of responses. use 'edu01' in regressions.
///tab educ_lucid
///gen edu01=(educ_lucid-1)/4
///tab edu01 educ_lucid

///*household income
///tab hhi_lucid
///gen incomefull=(hhi_lucid-1)/23
///label define income 0 "<15k" 1 "250k+"
///label values incomefull income
///tab hhi_lucid incomefull

///*census region
///*state of residence
///tab state

///gen west=0 if state!=.
///replace west=1 if state==49 | state==39 | state==6 | state==28 | state==14 | state==52 | state==46 | state==30 | state==7 | state==4 | state==33 | state==13 | state==3
///tab west

///gen midwest=0 if state!=.
///replace midwest=1 if state==36 | state==43 | state==29 | state==18 | state==25 | state==17 | state==27 | state==51 | state==15 | state==24 | state==16 |state==37
///tab midwest

///gen south=0 if state!=.
///replace south=1 if state==38 | state==45 | state==5 | state==20 | state==19 | state==44 | state==26 | state==2 | state==9 | state==22 | state==50 | state==10 | state==48 | state==35 | state==42 | state==12 | state==11
///tab south

///gen northeast=0 if state!=.
///replace northeast=1 if state==21 | state==31 | state==47 | state==23 | state==8 | state==41 | state==34 | state==32 | state==40
///tab northeast

///*urban/rural
///tab rurality
///gen rural=(rurality)/4
///label define rural 0 "urban" 1 "rural"
///label val rural rural
///tab rural
///tab rural rurality

///*COVID demographics
///tab covidpos_you
///gen selfpos=2-covidpos_you
///label define ny 0 "no" 1 "yes"
///label val selfpos ny
///label var selfpos "R tested COVID positive"
///tab covidpos_you selfpos

///tab covidpos_family
///gen fampos=2-covidpos_family
///label val fampos ny
///label var fampos "family/friends tested COVID positive"
///tab covidpos_family fampos

///*Indices creation

///*Individual behavior
alpha wash socdist trips mask vaccine buyonline maskindoors crowded avoidnovax, item 
///egen behavmiss=rowmiss(wash socdist trips mask vaccine buyonline maskindoors crowded avoidnovax)
///egen behavindex=rowmean(wash socdist trips mask vaccine buyonline maskindoors crowded avoidnovax) if behavmiss<5
///label value behavindex likely
///replace behavindex=round(behavindex, .01)
///fre behavmiss
///fre behavindex

///*Policy support
alpha pol_mask pol_worship pol_dining pol_lockdown pol_school pol_state pol_national pol_pass pol_mustvax, item
///egen polmiss=rowmiss(pol_mask pol_worship pol_dining pol_lockdown pol_school pol_state pol_national pol_pass pol_mustvax)
///egen polindex=rowmean(pol_mask pol_worship pol_dining pol_lockdown pol_school pol_state pol_national pol_pass pol_mustvax) if polmiss<5
///label value polindex pol
///replace polindex=round(polindex, .01)
///fre polmiss
///fre polindex

///*Analyses

///*Table 2 - Study 2
reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model1
test 1.condition=3.condition
test 2.condition=3.condition

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model2
test 1.condition#c.ideo=3.condition#c.ideo
test 2.condition#c.ideo=3.condition#c.ideo

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model3
test 1.condition=3.condition
test 2.condition=3.condition

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model4
test 1.condition#c.ideo=3.condition#c.ideo
test 2.condition#c.ideo=3.condition#c.ideo

esttab model1 model2 model3 model4, label b(2) se r2 star(+ 0.10 * 0.05 ** 0.01)  ///
  title(Table 2: Study 2)
  
///*Footnote 8 - excluding rurality as a control
reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull  west south midwest if attcorrect==1

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull west south midwest if attcorrect==1

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull west south midwest if attcorrect==1

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull west south midwest if attcorrect==1
  
///*Table A4 - Study 2 Participant Demographics
summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if attcorrect==1
tab educ_lucid if attcorrect==1
tab hhi_lucid if attcorrect==1

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==0 & attcorrect==1
tab educ_lucid if condition==0 & attcorrect==1
tab hhi_lucid if condition==0 & attcorrect==1

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==1 & attcorrect==1
tab educ_lucid if condition==1 & attcorrect==1
tab hhi_lucid if condition==1 & attcorrect==1

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==2 & attcorrect==1
tab educ_lucid if condition==2 & attcorrect==1
tab hhi_lucid if condition==2 & attcorrect==1

summ (ideo selfpos fampos age female onlywhite rural west northeast south midwest) if condition==3 & attcorrect==1
tab educ_lucid if condition==3 & attcorrect==1
tab hhi_lucid if condition==3 & attcorrect==1

///*Table A5 - Study 2 Distribution of Liberals, Moderates, and Conservatives
tab ideo3 condition if attcorrect==1

///*Table A6 - Study 2 Interaction with Partisanship
reg behavindex i.condition pid selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model1

reg behavindex i.condition##c.pid selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model2

reg polindex i.condition pid selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model3

reg polindex i.condition##c.pid selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
est store model4

esttab model1 model2 model3 model4, label b(2) se r2 star(+ 0.10 * 0.05 ** 0.01)  ///
  title(Table A6: Study 2)
  
///*Post-Hoc Testing

///*Ideology as a 7-point indicator
///gen ideo6=ideo*6

reg behavindex i.condition##i.ideo6 selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1
reg polindex i.condition##i.ideo6 selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1

///*Excluding those who spent five minutes or less on the survey
reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

///*controlling for the mode by which participants took the survey
reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest mobile if attcorrect==1 & duration>=5

reg behavindex i.condition##i.mobile ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest mobile if attcorrect==1 & duration>=5

reg polindex i.condition##i.mobile ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest mobile if attcorrect==1 & duration>=5

reg behavindex i.condition##c.ideo##i.mobile selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest mobile if attcorrect==1 & duration>=5

reg polindex i.condition##c.ideo##i.mobile selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 & duration>=5

///*controlling for vaccination status
///tab covidvaxreceipt
///gen vaxxed=2-covidvaxreceipt
///label val vaxxed ny
///label var vaxxed "have a vaccination"
///tab covidvaxreceipt vaxxed

reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest vaxxed if attcorrect==1 

reg behavindex i.condition##i.vaxxed ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest vaxxed if attcorrect==1 

reg polindex i.condition##i.vaxxed ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest vaxxed if attcorrect==1 

reg behavindex i.condition##c.ideo##i.vaxxed selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest vaxxed if attcorrect==1 

reg polindex i.condition##c.ideo##i.vaxxed selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

///*controlling for COVID concern
///tab covidexagg
///tab covidexagg, nolab  
///gen fatigue1=(4-covidexagg)/3
///label var fatigue1 "covid overexaggerated"
///label val fatigue1 pol
///tab fatigue1
///tab fatigue1 covidexagg

///tab covidconcernus
///tab covidconcernus, nolab  
///gen fatigue2=(covidconcernus-1)/3
///label var fatigue2 "NOT worried about COVID"
///label val fatigue2 pol
///tab fatigue2
///tab fatigue2 covidconcernus

///alpha fatigue1 fatigue2
///egen fatiguescale=rowmean(fatigue1 fatigue2)
///summ fatiguescale

reg behavindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest fatiguescale if attcorrect==1 

reg behavindex i.condition##c.fatiguescale ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg polindex i.condition ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest fatiguescale if attcorrect==1 

reg polindex i.condition##c.fatiguescale ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg behavindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest fatiguescale if attcorrect==1 

reg behavindex i.condition##c.ideo##c.fatiguescale selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 

reg polindex i.condition##c.ideo selfpos fampos age female onlywhite edu01 incomefull rural west south midwest fatiguescale if attcorrect==1 

reg polindex i.condition##c.ideo##c.fatiguescale selfpos fampos age female onlywhite edu01 incomefull rural west south midwest if attcorrect==1 
